Mobiclic 71/MOBICLIC 71.ISO/mac/DATA/COMMUN/temp0001/00247_Script_MODELE_COMPORTEMENT_BOUTON (à copier)

Text File | 2004-12-05 | 898b | 37 lines

global gJLM_W
property p_cettePiste, p_Nodepiste,p_nom_Acteur
----------------------------------
on beginsprite me
  p_Nodepiste = me.spriteNum
  p_cettePiste = sprite(p_Nodepiste)
  p_nom_Acteur = p_cettePiste.member.name
end
-----------------------------------
on mouseEnter
  if the pauseState = 1 then exit
  if gJLM_W > 0 then exit
  cursor 280
  p_cettePiste. member = p_nom_Acteur&"_R"
  updateStage
end
-----------------------------------
on mouseWithin
  if the pauseState = 1 then exit
  if gJLM_W > 0 then exit
  cursor 280
end
---------------------------------
on mouseLeave
  cursor -1
  if the pauseState = 1 then exit
  if gJLM_W > 0 then exit
  puppetsprite  p_Nodepiste , FALSE
end
-----------------------------------
on mouseUp
  if the pauseState = 1 then exit
  if gJLM_W > 0 then exit
  cursor -1
end
-----------------------------------